object editTps: TeditTps
  Left = 126
  Top = 43
  BorderStyle = bsSingle
  Caption = 'Detail TPS'
  ClientHeight = 615
  ClientWidth = 1129
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 584
    Top = 88
    Width = 537
    Height = 481
    Caption = 'Pemilih yang Sudah Terdaftar di TPS'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
    object lblPemilih: TLabel
      Left = 18
      Top = 21
      Width = 48
      Height = 13
      Caption = 'lblPemilih2'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object lblhal: TLabel
      Left = 127
      Top = 405
      Width = 14
      Height = 13
      Caption = 'hal'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      Visible = False
    end
    object btnHapus: TButton
      Left = 400
      Top = 431
      Width = 121
      Height = 25
      Caption = 'Hapus Pemilih dari TPS'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = btnHapusClick
    end
    object btnTambah: TButton
      Left = 11
      Top = 439
      Width = 96
      Height = 25
      Caption = 'Tambah Orang'
      TabOrder = 1
      Visible = False
      OnClick = btnTambahClick
    end
    object btnPindah: TButton
      Left = 224
      Top = 431
      Width = 161
      Height = 25
      Caption = 'Pindahkan Pemilih ke TPS lain'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = btnPindahClick
    end
    object sgTPS1: TStringGrid
      Left = 18
      Top = 40
      Width = 503
      Height = 353
      ColCount = 17
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goRowSelect]
      ParentFont = False
      TabOrder = 3
      Visible = False
      OnClick = sgTPS1Click
    end
    object Btnprev: TButton
      Left = 18
      Top = 399
      Width = 25
      Height = 25
      Caption = '<<'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      Visible = False
      OnClick = BtnprevClick
    end
    object txtHal: TEdit
      Left = 49
      Top = 399
      Width = 41
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      Visible = False
      OnKeyDown = txtHalKeyDown
    end
    object btnnext: TButton
      Left = 96
      Top = 399
      Width = 25
      Height = 25
      Caption = '>>'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      Visible = False
      OnClick = btnnextClick
    end
    object btnRefresh: TButton
      Left = 446
      Top = 399
      Width = 75
      Height = 25
      Caption = 'Refresh'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 7
      OnClick = btnRefreshClick
    end
    object cxGrid1: TcxGrid
      Left = 16
      Top = 48
      Width = 505
      Height = 345
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 8
      LookAndFeel.Kind = lfStandard
      LookAndFeel.NativeStyle = False
      object cxGrid1DBTableView1: TcxGridDBTableView
        NavigatorButtons.ConfirmDelete = False
        OnCellClick = cxGrid1DBTableView1CellClick
        DataController.DataModeController.SyncMode = False
        DataController.Filter.Options = [fcoCaseInsensitive]
        DataController.Options = [dcoCaseInsensitive, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding]
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        Filtering.ColumnPopup.MultiSelect = False
        FilterRow.InfoText = 'Ketikkan Pencarian di Kolom yang Diinginkan'
        FilterRow.Visible = True
        FilterRow.ApplyChanges = fracImmediately
        OptionsBehavior.IncSearch = True
        OptionsCustomize.ColumnMoving = False
        OptionsData.Deleting = False
        OptionsData.Editing = False
        OptionsData.Inserting = False
        OptionsSelection.CellSelect = False
        OptionsSelection.MultiSelect = True
        OptionsSelection.UnselectFocusedRecordOnExit = False
        OptionsView.GroupByBox = False
      end
      object cxGridTableView2: TcxGridTableView
        NavigatorButtons.ConfirmDelete = False
        DataController.Options = [dcoCaseInsensitive, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding]
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        FilterRow.Visible = True
        FilterRow.ApplyChanges = fracImmediately
        OptionsData.Deleting = False
        OptionsData.Editing = False
        OptionsData.Inserting = False
        OptionsSelection.MultiSelect = True
        OptionsView.GroupByBox = False
        object cxGridColumn20: TcxGridColumn
        end
        object cxGridColumn21: TcxGridColumn
        end
        object cxGridColumn22: TcxGridColumn
        end
        object cxGridColumn23: TcxGridColumn
        end
        object cxGridColumn24: TcxGridColumn
        end
        object cxGridColumn25: TcxGridColumn
        end
        object cxGridColumn26: TcxGridColumn
        end
        object cxGridColumn27: TcxGridColumn
        end
        object cxGridColumn28: TcxGridColumn
        end
        object cxGridColumn29: TcxGridColumn
        end
        object cxGridColumn30: TcxGridColumn
        end
        object cxGridColumn31: TcxGridColumn
        end
        object cxGridColumn32: TcxGridColumn
        end
        object cxGridColumn33: TcxGridColumn
        end
        object cxGridColumn34: TcxGridColumn
        end
        object cxGridColumn35: TcxGridColumn
        end
        object cxGridColumn36: TcxGridColumn
        end
        object cxGridColumn37: TcxGridColumn
        end
        object cxGridColumn38: TcxGridColumn
        end
      end
      object cxGrid1Level1: TcxGridLevel
        GridView = cxGrid1DBTableView1
      end
    end
  end
  object btnBatal: TButton
    Left = 1046
    Top = 580
    Width = 75
    Height = 25
    Caption = 'Batal'
    TabOrder = 1
    OnClick = btnBatalClick
  end
  object btnUbah: TButton
    Left = 949
    Top = 580
    Width = 75
    Height = 25
    Caption = 'Simpan'
    TabOrder = 2
    OnClick = btnUbahClick
  end
  object GroupBox3: TGroupBox
    Left = 11
    Top = 88
    Width = 566
    Height = 497
    Caption = 'Pemilih yang Belum Terdaftar di TPS'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 3
    object Label4: TLabel
      Left = 16
      Top = 26
      Width = 24
      Height = 13
      Caption = 'RW :'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 224
      Top = 26
      Width = 17
      Height = 13
      Caption = 'RT:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 16
      Top = 49
      Width = 43
      Height = 13
      Caption = 'Jumlah : '
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 64
      Top = 49
      Width = 4
      Height = 13
      Caption = '-'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 127
      Top = 439
      Width = 14
      Height = 13
      Caption = 'hal'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object rwcombo: TComboBox
      Left = 62
      Top = 18
      Width = 145
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 0
      Text = 'PILIH RW'
      OnChange = rwcomboChange
    end
    object rtcombo: TComboBox
      Left = 256
      Top = 18
      Width = 145
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 1
      Text = 'PILIH RT'
      OnChange = rtcomboChange
    end
    object StringGrid1: TStringGrid
      Left = 16
      Top = 68
      Width = 537
      Height = 353
      ColCount = 19
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goRowSelect]
      ParentFont = False
      TabOrder = 2
      Visible = False
      OnClick = StringGrid1Click
      ColWidths = (
        64
        64
        64
        64
        64
        64
        64
        64
        64
        64
        64
        64
        64
        64
        64
        64
        64
        64
        64)
      RowHeights = (
        24
        24
        24
        24
        24)
    end
    object Button2: TButton
      Left = 16
      Top = 427
      Width = 25
      Height = 25
      Caption = '<<'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = Button2Click
    end
    object Edit1: TEdit
      Left = 47
      Top = 427
      Width = 41
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnKeyDown = Edit1KeyDown
    end
    object Button1: TButton
      Left = 94
      Top = 427
      Width = 25
      Height = 25
      Caption = '>>'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnClick = Button1Click
    end
    object btnTambahSemua: TButton
      Left = 384
      Top = 427
      Width = 170
      Height = 25
      Caption = 'Daftarkan Semua ke TPS'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      OnClick = btnTambahSemuaClick
    end
    object btnTambahOrang: TButton
      Left = 360
      Top = 456
      Width = 193
      Height = 25
      Caption = 'Daftarkan yang Dipilih ke TPS '
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 7
      OnClick = btnTambahOrangClick
    end
    object cxGrid2: TcxGrid
      Left = 16
      Top = 80
      Width = 537
      Height = 345
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 8
      LookAndFeel.Kind = lfStandard
      LookAndFeel.NativeStyle = False
      object cxGrid2DBTableView1: TcxGridDBTableView
        NavigatorButtons.ConfirmDelete = False
        DataController.DataModeController.SyncMode = False
        DataController.Filter.Options = [fcoCaseInsensitive]
        DataController.Options = [dcoCaseInsensitive, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding]
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        Filtering.ColumnPopup.MultiSelect = False
        FilterRow.InfoText = 'Ketikkan Pencarian di Kolom yang Diinginkan'
        FilterRow.Visible = True
        FilterRow.ApplyChanges = fracImmediately
        OptionsBehavior.IncSearch = True
        OptionsCustomize.ColumnMoving = False
        OptionsData.Deleting = False
        OptionsData.Editing = False
        OptionsData.Inserting = False
        OptionsSelection.CellSelect = False
        OptionsSelection.MultiSelect = True
        OptionsSelection.UnselectFocusedRecordOnExit = False
        OptionsView.GroupByBox = False
      end
      object cxGridTableView1: TcxGridTableView
        NavigatorButtons.ConfirmDelete = False
        DataController.Options = [dcoCaseInsensitive, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding]
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        FilterRow.Visible = True
        FilterRow.ApplyChanges = fracImmediately
        OptionsData.Deleting = False
        OptionsData.Editing = False
        OptionsData.Inserting = False
        OptionsSelection.MultiSelect = True
        OptionsView.GroupByBox = False
        object cxGridColumn1: TcxGridColumn
        end
        object cxGridColumn2: TcxGridColumn
        end
        object cxGridColumn3: TcxGridColumn
        end
        object cxGridColumn4: TcxGridColumn
        end
        object cxGridColumn5: TcxGridColumn
        end
        object cxGridColumn6: TcxGridColumn
        end
        object cxGridColumn7: TcxGridColumn
        end
        object cxGridColumn8: TcxGridColumn
        end
        object cxGridColumn9: TcxGridColumn
        end
        object cxGridColumn10: TcxGridColumn
        end
        object cxGridColumn11: TcxGridColumn
        end
        object cxGridColumn12: TcxGridColumn
        end
        object cxGridColumn13: TcxGridColumn
        end
        object cxGridColumn14: TcxGridColumn
        end
        object cxGridColumn15: TcxGridColumn
        end
        object cxGridColumn16: TcxGridColumn
        end
        object cxGridColumn17: TcxGridColumn
        end
        object cxGridColumn18: TcxGridColumn
        end
        object cxGridColumn19: TcxGridColumn
        end
      end
      object cxGrid2Level1: TcxGridLevel
        GridView = cxGrid2DBTableView1
      end
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 8
    Width = 1113
    Height = 73
    Caption = 'Informasi TPS'
    Color = cl3DLight
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    TabOrder = 4
    object lblKet: TLabel
      Left = 264
      Top = 21
      Width = 26
      Height = 13
      Caption = 'lblKet'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 264
      Top = 43
      Width = 28
      Height = 13
      Caption = 'TPS : '
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 440
      Top = 43
      Width = 61
      Height = 13
      Caption = 'Alamat TPS :'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object lblTps: TLabel
      Left = 296
      Top = 44
      Width = 27
      Height = 13
      Caption = 'lblTps'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object txtAlamatTPS: TEdit
      Left = 508
      Top = 40
      Width = 217
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      Text = 'txtAlamatTPS'
    end
    object cbtps: TComboBox
      Left = 296
      Top = 40
      Width = 113
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 1
      OnChange = cbtpsChange
    end
  end
  object ZConnection1: TZConnection
    Left = 120
    Top = 264
  end
  object ZQuery1: TZQuery
    Connection = ZConnection1
    Params = <>
    Left = 216
    Top = 344
  end
  object ZTable1: TZTable
    Connection = ZConnection1
    Left = 336
    Top = 312
  end
  object ZQuery2: TZQuery
    Connection = ZConnection1
    Params = <>
    Left = 216
    Top = 248
  end
  object ZTable2: TZTable
    Connection = ZConnection1
    Left = 304
    Top = 272
  end
  object ZQuery3: TZQuery
    Connection = ZConnection1
    Params = <>
    Left = 163
    Top = 320
  end
  object ZQuery4: TZQuery
    Connection = ZConnection1
    Params = <>
    Left = 275
    Top = 376
  end
  object dsRT: TDataSource
    Left = 507
    Top = 120
  end
  object dsTPS: TDataSource
    Left = 1016
    Top = 104
  end
  object qryRT: TZQuery
    Params = <>
    Left = 475
    Top = 120
  end
  object qryTPS: TZQuery
    Params = <>
    Left = 987
    Top = 104
  end
end
